package com.daqsoft.service.project;

import com.daqsoft.dao.project.NodeDao;
import com.daqsoft.data.project.Node;
import com.daqsoft.data.project.Project;
import com.daqsoft.data.project.Task;
import com.daqsoft.dto.StatusEnum;
import com.daqsoft.util.DateUtil;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.scheduling.annotation.Scheduled;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import java.util.*;
import java.util.stream.Collectors;

/**
 * @author 周麟东 on 18:19
 */
@Service
public class NodeService {
    private Logger log = LoggerFactory.getLogger(getClass());
    @Autowired
    private ProjectService projectService;
    @Autowired
    private NodeDao dao;
    @Autowired
    private TaskService taskService;

    /**
     * 保存节点
     *
     * @param project 项目对象
     * @param node    要保存的节点对象
     * @return 保存完成的对象
     */
    public Node save(Project project, Node node) {
        node.setProject(project);
        if (node.getId() < 1) { // 新增节点 放到最后
            Integer lastIndex = dao.findMaxIndexByPrject(project);
            if (lastIndex == null) {
                lastIndex = 0;
            }
            node.setIndex(lastIndex + 1);
        }
        //保存当前节点
        node = dao.save(node);
        return node;
    }

    public Node save(Node node) {
        return dao.save(node);
    }


    /**
     * 通过项目ID获取节点信息
     *
     * @param projectId 项目ID
     * @return 节点对象集合
     */
    public List<Node> getNodesByProject(int projectId) {
        Project project = projectService.get(projectId);
        return dao.findNodesByProjectOrderByIndex(project);
    }

    /**
     * 获取没有下个节点的节点
     * 获取index为最大值的对象
     *
     * @param project 项目对象
     * @return 节点对象集合
     */
    public Node getHaveNoNextNode(Project project) {
        return get(dao.findMaxIndexByPrject(project));
    }

    /**
     * 删除节点
     *
     * @param node 节点对象
     */
    @Transactional
    public void remove(Node node) {
        dao.delete(node);
        //重新排序
        List<Node> nodes = dao.findByIndexGreaterThanAndProject(node.getIndex(), node.getProject());
        if (nodes == null) {
            return;
        }
        for (Node after : nodes) {
            after.setIndex(after.getIndex() - 1);
            save(after);
        }
    }

    /**
     * 通过ID获取一个节点
     *
     * @param nodeId 节点ID
     * @return 节点对象
     */
    public Node get(int nodeId) {
        return dao.findOne(nodeId);
    }

    /**
     * 节点向下移动 一步
     * 如果无法移动 则返回空
     *
     * @param node 节点对象
     * @return 修改后的节点对象
     */
    @Transactional
    public Node down(Node node) {
        Node next = getNext(node);
        if (next == null) {
            return null;
        }
        //保存下一个节点为当前节点的index
        next.setIndex(node.getIndex());
        dao.save(next);
        //保存当前节点为当前节点+1
        node.setIndex(node.getIndex() + 1);
        return dao.save(node);
    }

    /**
     * 节点向上移动一步
     * 如果无法移动 则返回空
     *
     * @param node 节点对象
     * @return 修改后的节点对象
     */
    public Node up(Node node) {
        Node prev = getPrev(node);
        if (prev == null) {
            return null;
        }
        prev.setIndex(node.getIndex());
        save(prev);
        node.setIndex(node.getIndex() - 1);
        save(node);
        return node;
    }

    public Node getNodeByIndex(Project project, int index) {
        return dao.findFirstByProjectAndIndex(project, index);
    }

    /**
     * 获取节点的上个节点
     *
     * @param node 节点对象
     * @return 上个节点对象
     */
    public Node getPrev(Node node) {
        int index = node.getIndex() - 1;
        if (index == 0) {
            return node;
        }
        return dao.findFirstByProjectAndIndex(node.getProject(), index);
    }

    public Node getNext(Node node) {
        int index = node.getIndex() + 1;
        return dao.findFirstByProjectAndIndex(node.getProject(), index);
    }

    /**
     * 每分钟检查一次任务是否到开启时间 , 如果到了就设置为正在进行中
     */
    @Scheduled(fixedRate = 1000 * 10)
    public void check() {
        List<Node> nodes = dao.findNodeByStatusOrderByIndex(StatusEnum.WAIT);
        if (nodes == null || nodes.isEmpty()) {
            return;
        }
        Iterator<Node> iterator = nodes.iterator();
        while (iterator.hasNext()) {
            Node node = iterator.next();
            if (node.getProject() != null && node.getProject().getStatus() != StatusEnum.PROCESS) {//项目不正在进行中则不予理会
                iterator.remove();
                continue;
            }
            if (getPrev(node) != null && getPrev(node).getStatus() != StatusEnum.FINISH) {//上个节点没有完成则不予理会
                iterator.remove();
                continue;
            }
            node.setStatus(StatusEnum.PROCESS);
        }
        if (nodes.isEmpty()) {
            return;
        }
        dao.save(nodes);
        log.info("节点检查完成 , 共{}个节点设置为进行中", nodes.size());
    }


    /**
     * 检查节点是否可以完成
     * 如果可以完成 则完成该节点并返回true 否则返回 false
     *
     * @param node 节点对象
     */
    public boolean checkNodeFinish(Node node) {
        if (node == null) {
            return false;
        }
        List<Task> tasks = node.getTasks();
        if (tasks == null) {
            return false;
        }
        boolean isFinish = true;
        for (Task task : tasks) {
            if (task.getStatus() != StatusEnum.FINISH) {
                isFinish = false;
                break;
            }
        }
        if (!isFinish) {
            return false;
        }
        node.setStatus(StatusEnum.FINISH);
        dao.save(node);
        return false;
    }

    /**
     * 拷贝节点 并拷贝节点中的任务
     *
     * @param from   从哪个项目
     * @param target 拷贝到哪个项目
     */
    @Transactional
    public void copyNodes(Project from, Project target) {
        List<Node> nodes = from.getNodes();
//        //老节点和新节点的关系 Key为新节点的ID value为老节点
//        Map<Integer, Node> newOld = new HashMap<>();
//        //老节点和新节点的关系 Key为老节点的ID value为新节点
//        Map<Integer, Node> oldNew = new HashMap<>();
//        List<Node> newNodes = new ArrayList<>();
        for (Node node : nodes) {
            Node newNode = cloneNode(node);
            newNode.setProject(target);
            newNode = dao.save(newNode);
//            newOld.put(newNode.getId(), node);
//            oldNew.put(node.getId(), newNode);
            newNode.setTasks(taskService.copyTask(node.getTasks(), newNode, null));
//            newNodes.add(newNode);
        }

        //更新节点关系
//        for (Node newNode : newNodes) {
//            Node old = newOld.get(newNode.getId());
//            if (old.getNext() != null) {
//                Node next = oldNew.get(old.getNext().getId());
//                if (next != null) {
//                    newNode.setNext(next);
//                }
//            }
//            if (old.getPrev() != null) {
//                Node prev = oldNew.get(old.getPrev().getId());
//                if (prev != null) {
//                    newNode.setPrev(prev);
//                }
//            }
//            dao.save(newNode);
//        }

    }

    /**
     * 克隆Node 对象 ,但是不是单纯的克隆 会有一定的修改
     * id为0
     * 所属项目对象为空 需要后面单独设置
     * 上个节点和下个节点为空 也需要重新设置
     *
     * @param node 需要克隆的node对象
     * @return 新建的Node对象
     */
    private Node cloneNode(Node node) {
        Node newNode = new Node();
        newNode.setId(0);
        newNode.setName(node.getName());
        newNode.setDesc(node.getDesc());
        newNode.setStatus(node.getStatus());
        newNode.setStartDate(node.getStartDate());
        newNode.setEndDate(node.getEndDate());
        newNode.setIndex(node.getIndex());
        return newNode;
    }

    /**
     * 更改正在变更的节点
     *
     * @param node       变更节点对象
     * @param statusEnum 节点状态
     * @return 修改后的节点对象
     */
    @Transactional
    public Node updateChangeNode(Node node, StatusEnum statusEnum) {

        //先设置节点状态
        node.setStatus(statusEnum);
        //保存节点
        node = dao.save(node);
        //遍历节点任务 更改节点任务状态
        List<Task> tasks = node.getTasks();
        if (tasks != null && node.getStatus() != StatusEnum.PROCESS) {
            for (Task task : tasks) {
                if (statusEnum == StatusEnum.WAIT) {
                    taskService.updateChangeTask(task, task.getVerifier(), task.getPrincipal(), StatusEnum.WAIT);
                }
                if (statusEnum == StatusEnum.FINISH) {
                    taskService.updateChangeTask(task, task.getVerifier(), task.getPrincipal(), StatusEnum.FINISH);
                }
            }
        }
        return node;
    }

    /**
     * 比较两个节点的任务
     *
     * @param node1 节点1对象
     * @param node2 节点2对象
     * @return 比较结果
     */
    public List<Map<String, Object>> comparNode(Node node1, Node node2) {

        List<Task> node1Task = node1.getTasks();
        List<Task> node2Task = node2.getTasks();
        List<Map<String, Object>> list = new ArrayList<>();

        boolean isNode1Big = node1Task.size() >= node2Task.size();
        List<Task> bigOne = node2Task;
        List<Task> samllOne = node1Task;

        if (isNode1Big) {
            bigOne = node1Task;
            samllOne = node2Task;
        }
        for (int i = 0; i < bigOne.size(); i++) {
            Task big = bigOne.get(i);
            Task samll = null;
            if (samllOne.size() >= (i + 1)) {
                samll = samllOne.get(i);
            }
            Task t1;
            Task t2;
            if (isNode1Big) {
                t1 = big;
                t2 = samll;
            } else {
                t1 = samll;
                t2 = big;
            }
            Map<String, Object> map = new HashMap<>();
            map.put("id", new int[]{t1 == null ? 0 : t1.getId() , t2 == null ? 0 : t2.getId()});
            map.put("name", new String[]{t1 == null ? "" : t1.getName() , t2 == null ? "" :  t2.getName()});
            map.put("startDate", new String[]{t1 == null ? "" : DateUtil.INS.parse(t1.getStartDate()), t2 == null ? "" : DateUtil.INS.parse(t2.getStartDate())});
            map.put("endDate", new String[]{t1 == null ? "" : DateUtil.INS.parse(t1.getEndDate()) , t2 == null ? "" : DateUtil.INS.parse(t2.getEndDate())});
            map.put("verifierName", new String[]{t1 == null ? "" : t1.getVerifier().getRealName() , t2 == null ? "" : t2.getVerifier().getRealName()});
            map.put("children" , taskService.comparTask( t1 == null ? null : t1.getChildren() , t2 == null ? null : t2.getChildren()));
            if ((t1 == null || t1.getChildren() == null || t1.getChildren().size() == 0) || (t2 == null || t2.getChildren() == null || t2.getChildren().size() == 0)){
                map.put("leaf",true);
            }else {
                map.put("leaf",false);
                map.put("expanded",true);
            }
            list.add(map);
        }
        return list;
    }
}
